COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	PRECEDE
C00003 ENDMK
C⊗;
PRECEDE;
NPTIX←150;
FUNC FUN; < F1, F2, F3, F4, F5, F6
COMMON TOOT   TOOT CLAR BRIT BUZZ;
COMMON REVRB;
*
REVRB 0 1; P2 10;END;
CLAR 0 0 89;  < SAMSON BOX VERSION
P2 0;
P23 C4;
P25 E4;
P27 G4;
P30 C5;
  P23 MOVE/7 C3 C6 C4 C;
P24 MOVE/6 C3 C6 D4 D;
  P25 MOVE/7 C3 C6 E4 E;
P26 MOVE/5 C3 C6 F4 F;
  P27 MOVE/7 C3 C6 G4 G;
P28 MOVE/6 C3 C6 A4 A;
P29 MOVE/7 C3 C6 B4 B;
  P30 MOVE/5 C3 C6 C5 C;
END;
CLAR 2 2;
P2 .1;
P3 NO/P23/P24/P25/P26/P27/P28/P29/P30;
P4 .7 ; P5 F2; 
   P6 F4;
P13 F4; P12 .1;
  DF P18;
P18 NU/3/1/3/1/3/1/1/3;
END;